﻿namespace ISPackageService.Services

open System
open ISPackageService.Contracts

type ISPackageService() =
    interface IISPackageServiceContract with

        override this.LoadFile(pkgPath:string, pkgSrcTyp:string) = 
            MPIS.ISPackage_LoadProg.Load pkgPath  pkgSrcTyp "" "" ""
        
        override this.LoadSQL(pkgPath:string, pkgSrcTyp:string, svr:string, usr:string, pwd:string) = 
            MPIS.ISPackage_LoadProg.Load pkgPath  pkgSrcTyp svr usr pwd
        
        override this.LoadDts(pkgPath:string, pkgSrcTyp:string, svr:string) = 
            MPIS.ISPackage_LoadProg.Load pkgPath  pkgSrcTyp svr "" ""